﻿Imports System.Transactions
Imports Sistema_InformacionNaviera.BE
Imports Sistema_InformacionNaviera.DALC

Public Class UsuarioBC
    Public Function ValidarUser(ByVal objUsuarioBE As UsuarioBE) As Boolean

        Dim bResultado As Boolean = False
        Dim objUsuarioDALC As UsuarioDALC = Nothing

        objUsuarioDALC = New UsuarioDALC
        bResultado = objUsuarioDALC.ValidarUser(objUsuarioBE)

        Return bResultado
    End Function
End Class
